Profile of (eval 270)[Sub/Quote.pm:3]

Filename	(eval 270)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 168 statements in 376µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
14	1	1	237µs	1.08ms	JSON::Schema::Modern::Document::_set_metaschema_uri
1	1	1	8µs	18µs	JSON::Schema::Modern::Document::BEGIN@7.120
1	1	1	4µs	14µs	Method::Generate::Accessor::_Generated::BEGIN@39.122
1	1	1	3µs	3µs	Method::Generate::Accessor::_Generated::BEGIN@12.121

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	1µs			my $coerce_for_metaschema_5furi = ${$_[1]->{"\$coerce_for_metaschema_5furi"}};
3	1	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
5	1	0s			my $isa_check_for_metaschema_5furi = ${$_[1]->{"\$isa_check_for_metaschema_5furi"}};
6					package JSON::Schema::Modern::Document;
7	2	29µs	2	28µs	# spent 18µs (8+10) within JSON::Schema::Modern::Document::BEGIN@7.120 which was called: # once (8µs+10µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 18µs making 1 call to JSON::Schema::Modern::Document::BEGIN@7.120 # spent 10µs making 1 call to warnings::unimport
8					# spent 1.08ms (237µs+848µs) within JSON::Schema::Modern::Document::_set_metaschema_uri which was called 14 times, avg 78µs/call: # 14 times (237µs+848µs) by JSON::Schema::Modern::Document::traverse at line 192 of /Users/ether/git/JSON-Schema-Modern/lib/JSON/Schema/Modern/Document.pm, avg 78µs/call sub _set_metaschema_uri {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package Method::Generate::Accessor::_Generated;
12					# spent 3µs within Method::Generate::Accessor::_Generated::BEGIN@12.121 which was called: # once (3µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	0s			$^H = 1762;
14	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	3µs			%^H = (
16					);
17	1	53µs	1	3µs	} # spent 3µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@12.121
18					# END quote_sub PRELUDE
19	28	20µs			scalar do { my $value = do {
20	14	34µs			local $Method::Generate::Accessor::CurrentAttribute = {
21					init_arg => undef(),
22					name => "metaschema_uri",
23					step => "coercion",
24					};
25	14	4µs			(my $_return),
26					(my $_error), (my $_old_error = $@);
27	14	8µs			(eval {
28	14	39µs	14	821µs	($@ = $_old_error), # spent 821µs making 14 calls to JSON::Schema::Modern::Document::__ANON__[/Users/ether/git/JSON-Schema-Modern/lib/JSON/Schema/Modern/Document.pm:45], avg 59µs/call
29					($_return =
30					$coerce_for_metaschema_5furi->($_[1])),
31					1
32					} or
33					$_error = CORE::ref $@ ? $@ : "coercion for \"metaschema_uri\" failed: ".$@);
34	14	6µs			($@ = $_old_error),
35					(defined $_error and CORE::die $_error);
36	14	15µs			$_return;
37					}
38					;
39	30	144µs	30	51µs	# spent 14µs (4+10) within Method::Generate::Accessor::_Generated::BEGIN@39.122 which was called: # once (4µs+10µs) by Sub::Quote::_clean_eval at line 39 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[Mojo::URL]))) or Type::Tiny::_failed_check($isa_check_for_metaschema_5furi, "InstanceOf[\"Mojo::URL\"]", $value, "attribute_name","metaschema_uri","attribute_step","isa check","mgaca","0","varname","\$self->{\"metaschema_uri\"}"); $value }), # spent 18µs making 14 calls to UNIVERSAL::isa, avg 1µs/call # spent 14µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@39.122 # spent 10µs making 1 call to warnings::unimport # spent 9µs making 14 calls to Scalar::Util::blessed, avg 643ns/call
40					($_[0]->{"metaschema_uri"} = $value),
41	14	17µs			($_[0]->{"metaschema_uri"}),
42					} }
43	1	0s			$$_UNQUOTED = \&_set_metaschema_uri;
44					}
45	1	3µs			1;
46
47					;